home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh8x / sh81a.d64 / play me (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1995-03-30  |  945 b   |  29 lines
  1. 0 REM *** PLAY ME ***
  2. 1 :
  3. 2 REM ABSPIELEN EINER MAESTRO-64-MELODIE
  4. 3 :
  5. 4 REM (C) NH-150388-ARR
  6. 5 :
  7. 10 IFPEEK(49153)<>65THENLOAD"MC1",8,8
  8. 15 DIMA%(3,2500),B%(15,10)
  9. 20 INPUT"FILENAME DER MELODIE ";A$
  10. 30 INPUT"ABSPIELGESCHWINDIGKEIT ";F%
  11. 35 PRINT"MOMPLS...
  12. 36 [129]I[178].[164]10:[129]J[178].[164]14:[135]B%(J,I):[130]J,I
  13. 40 [158]49161,A%(0,0),A$,8,0
  14. 45 [151]49544,.:[151]49561,.:[151]49565,209:[143] ROUTINE 'KASTRIEREN'
  15. 46 [153]"TASTEN: SHIFT RETURN - ENDE
  16. 47 PRINT"        F7/F8        - TEMPO[157][157][157][157]VIEL SPASS !
  17. 50 [158]49164,A%(0,0),F%,B%(0,0)
  18. 490 [131]11,64,9,6,5,64,9,6,8,64,10,6,64,,79
  19. 492 [131]8,64,4,24,8,64,4,24,8,64,4,24,64,,79
  20. 494 [131]6,64,27,89,6,64,27,88,11,64,11,87,64,,79
  21. 496 [131],32,11,,,32,11,,,32,8,,64,,79
  22. 498 [131],32,51,,,32,51,,,32,51,,64,,79
  23. 500 [131]12,32,104,24,12,32,104,42,12,32,104,42,64,,79
  24. 502 [131]9,16,57,,9,16,57,,9,16,57,,64,,79
  25. 504 [131]15,16,9,25,15,16,9,25,15,16,9,25,64,,79
  26. 506 [131]10,16,39,73,10,16,39,73,10,16,39,73,64,,79
  27. 508 [131],32,7,25,3,64,9,25,,16,9,121,64,,79
  28. 510 [131]8,64,9,6,8,64,9,6,8,64,9,6,64,,79
  29.